home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
126-150
/
disk_126
/
iconify
/
iconify.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-06
|
5KB
|
212 lines
/* :ts=8 bk=0
*
* iconify.c: You asked for it, you got it.
*
* Copyright 1987 by Leo L. Schwab.
* Permission is hereby granted for use in any and all programs, both
* Public Domain and commercial in nature, provided this Copyright notice
* is left intact. Purveyors of programs, at their option, may wish observe
* the following conditions (in the spirit of hackerdom):
* 1: You send me a free, registered copy of the program that uses the
* iconify feature,
* 2: If you're feeling really nice, a mention in the program's
* documentation of my name would be neat.
*
* 8712.10 (415) 456-3960
*/
#include <exec/types.h>
#include <devices/timer.h>
#include <intuition/intuition.h>
#include "iconify.h"
/*
* It is recommended that the tick rate not be made too rapid to avoid
* bogging down the system.
*/
#define TICKS_PER_SECOND 10
/*
* Some programmers may not wish to have the added functionality of the
* ICON_FUNCTION feature. If you're such a programmer, you may comment out
* the following #define, which will eliminate the code to handle function
* calls, and make iconify() even smaller.
*/
#define USE_FUNCTIONS
/*
* Jim Mackraz suggested making icons easily identifiable by outside
* programs, so this constant gets stuffed into the UserData field.
*/
#define ICON 0x49434f4eL /* 'ICON' */
extern void *OpenWindow(), *GetMsg(), *CreatePort(), *CreateExtIO(),
*CheckIO();
extern long OpenDevice(), DoubleClick();
static struct Gadget gadget = {
NULL,
0, 0, 0, 0,
NULL, /* Set later */
GADGIMMEDIATE,
WDRAGGING, /* Observe the Magic! */
NULL, /* Set later */
NULL, NULL, NULL, NULL,
0, 0
};
static struct NewWindow windef = {
0, 0, 0, 0, /* Set later */
-1, -1,
GADGETDOWN,
BORDERLESS | SMART_REFRESH | NOCAREREFRESH,
&gadget,
NULL, NULL, NULL, NULL, /* Lotsa these */
0, 0, 0, 0,
WBENCHSCREEN
};
static struct Window *win;
#ifdef USE_FUNCTIONS
static struct timerequest *tr;
static struct MsgPort *reply;
#endif
iconify (left, top, width, height, screen, ptr, type)
UWORD *left, *top, width, height;
struct Screen *screen;
APTR ptr;
int type;
{
register struct IntuiMessage *msg;
long secs = 0, mics = 0,
cs, cm,
class,
sigmask;
windef.LeftEdge = *left;
windef.TopEdge = *top;
windef.Width = width;
windef.Height = height;
windef.Type = (windef.Screen = screen) ? CUSTOMSCREEN : WBENCHSCREEN;
gadget.Flags = GADGHCOMP | GRELWIDTH | GRELHEIGHT;
switch (type & 3) {
case ICON_IMAGE:
gadget.Flags |= GADGIMAGE;
case ICON_BORDER:
gadget.GadgetRender = ptr;
break;
case ICON_FUNCTION:
#ifdef USE_FUNCTIONS
gadget.GadgetRender = NULL;
#else
return (0);
#endif
break;
default:
return (0);
}
if (!openstuff ())
return (0);
sigmask = 1L << win -> UserPort -> mp_SigBit;
#ifdef USE_FUNCTIONS
if (type == ICON_FUNCTION) {
sigmask |= 1L << reply -> mp_SigBit;
tr -> tr_node.io_Command= TR_ADDREQUEST;
tr -> tr_time.tv_secs = 0;
tr -> tr_time.tv_micro = (1000000L / TICKS_PER_SECOND);
SendIO (tr);
/*
* Make initialization call to user's function.
* Isn't typecasting wonderful? :-|
*/
(* ((void (*)()) ptr)) (win, (WORD) 1);
}
#endif
while (1) {
Wait (sigmask);
#ifdef USE_FUNCTIONS
if (GetMsg (reply)) {
/*
* Call user's function to do something to the icon.
*/
(* ((void (*)()) ptr)) (win, (WORD) 0);
tr -> tr_time.tv_secs = 0;
tr -> tr_time.tv_micro =
(1000000L / TICKS_PER_SECOND);
SendIO (tr);
}
#endif
if (msg = GetMsg (win -> UserPort)) {
class = msg -> Class;
cs = msg -> Seconds;
cm = msg -> Micros;
ReplyMsg (msg);
if (class == GADGETDOWN) {
if (DoubleClick (secs, mics, cs, cm))
break;
secs = cs; mics = cm;
}
}
}
#ifdef USE_FUNCTIONS
if (type == ICON_FUNCTION) {
AbortIO (tr);
WaitIO (tr);
}
#endif
*left = win -> LeftEdge;
*top = win -> TopEdge;
closestuff ();
return (1);
}
static
openstuff ()
{
if (!(win = OpenWindow (&windef)))
return (0);
win -> UserData = (BYTE *) ICON;
#ifdef USE_FUNCTIONS
if (!(reply = CreatePort (NULL, NULL)) ||
!(tr = CreateExtIO (reply, (long) sizeof (*tr))) ||
OpenDevice (TIMERNAME, UNIT_VBLANK, tr, 0L)) {
closestuff ();
return (0);
}
#endif
return (1);
}
static
closestuff ()
{
#ifdef USE_FUNCTIONS
if (tr) {
if (tr -> tr_node.io_Device)
CloseDevice (tr);
DeleteExtIO (tr, (long) sizeof (*tr));
}
if (reply) DeletePort (reply);
#endif
if (win) CloseWindow (win);
}